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Videx Ultraterm Driver 


We've just completed a Videx Ultraterm display driver for S-C 
Macro Assembler Version 2.0, so now you fine-print fans can use 
the assembler with that card's high-density modes. (My 
favorite is the 48 x 80 inverse mode.) As with the other 
Version 2.0 drivers, complete source code is supplied so you 
can tailor the card's performance to your tastes. 


This driver is included on all Version 2.0 disks after number 
1274. Those of you with lower serial numbers can return your 
original disk for updating. Please include $1.00 to cover 
postage and handling. We have also corrected several minor 
assembler bugs in the last month, so those of you with serial 
numbers below 1252 might want to update your disks as well. 


Quarterly Disk #18 


I'd also like to remind you that AAL Quarterly Disk #18 is now 
ready. This disk contains all of the source code from the 
January through March ‘85 issues, including the final install- 
ments of DP18 and this month's 65816 disassembler. That's many 
hours' worth of typing saved, at a cost of only $15. Remember 
that we also sell a year's subscription to the Quarterly disks 
for only $45. That's four disks for the price of three! 


Shortening the DOS File Buffer Builder.....Bob Sander-Cederlof 


Lately I have been looking through DOS for subroutines that can 
be shrunk. There seem to be a lot of them, or at least I have 
been lucky in finding some easy ones with little trouble. 
Elsewhere this month I show how to shrink the numeric input 
conversion routine, saving enough bytes to make room for a 
useful new feature. 


Yesterday I happened across the file buffer initializer, which 
starts at S$A7D4 and goes up to SA850. Scanning quickly through 
the code it looked a likely candidate for the shrinking 
process. If you take a quick peek, you'll see that it starts 
out with an SEC instruction that is totally unnecessary. 
Already we have shaved off one byte! 


The DOS file buffers are each 595 bytes, linked together with a 
chain of pointers. There are normally three buffers, starting 
at $9600, $9853, and $9AA6. (If you have “Beneath Apple DOS", 
look on page 6-13 for some explanation.) Each buffer contains 
a 256 byte area for data, another 256 byte area for a track/ 
sector list, a 30-character filename, a 45-byte working area 
for the DOS File Manager, and 4 2-byte pointers. There is a 
two-byte pointer kept at $9D00,9D01 which points at the first 
character of the filename in the highest buffer. This is 
normally $9CD3. Here is a picture of the normal three buffers, 
all chained together: 


start 


9D00: 


ik eerie Link addr Link addr 
($S9A80) |—next ($982D) faut ($0000) Jend 
ne PSSAAB) 
(S9AA6) ($9853) ($9600) 
9BA6 ($9953) ($9700) 
9CA6 9A53 $9800 
9CD3-| filename 9A80-| filename 982D-| filename 


45 bytes 


FMW area 9A53-|FMW area 9800-|FMW area 
9953-ITSL area 9700- 
9853-|Data area 9600-/Data area 
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S-C Macro Assembler Version 2.0. .ccccvcccvcccccsccsccccccccsccseccces SlON 
Version 2.0 Upgrade Kit for 1.0/1.1/1.2 OwnerS...cccccrccccccccscccsese al 
Source Code for Version 1.1 (on two disk Sides)... .ccccvcccsccccccese Sl OO 
Full Screen Editor for S-C Macro (with complete source code) ..........$49 
S-C Cross Reference Utility (without source Code) ..ccccccccrccccccesseos0 
S-C Cross Reference Utility (with complete source code).....c.cceeeeveee 900 
DISASM Dis-Assembler (RAR=“WAL OG) 66 isd. ow Shwe 6 Oo wo ewe eae eee eOo0 
Source Code for DISASMe ccc ccc ccc cccccceccccccccccccccccc ce  aaditional $30 
S-C Word Processor (with complete source COde)....cccccsccccccccccesese D0 
DP18 Source and ODTOCT boise hike 6 ow i 4 awe os Kee oe ee Cees O00 
Double Precision Floating Point for Applesoft (with source code)......$50 
S-C Documentor (complete commented source code of Applesoft ROMs).....$50 
Source Code of //fe CX & F8 ROMS on CLG 6 i0w seen bee ee eS eeeeee lS 


(All source code is formatted for S-C Macro Assembler. Other assemblers 
require some effort to convert file type and edit directives.) 


AAL Quarterly DisSkS.....ccccccccccccecccseee each $15, or any four for $45 
Jan-Mar Apr-Jun Jul-Sep Oct-Dec 
= - 7 1 


Each disk contains 1980 

the source code from 1981 2 3 4 5 

three issues of AAL, 1982 6 7 8 9 

saving you lots of 1983 10 ll 12 13 

typing and testing. 1984 14 15 16 17 
1985 18 


AWIIe Toolkit (Don Lancaster, SynergeticsS) ....cccccccsccccceccvcceesee Sao 
Visible Computer: 6502 (Software Masters) ....cccccccccceee (reg. $50) $45 
ES-CAPE: Extended S-C Applesoft Program Editor (new price, was $60) $40 
“Bag of Tricks", Worth & Lechner, with diskette........eee+e ($39.95) $36 


Blank Diskettes (Verbatim)... cccsccccccccccescsecses package of 20 for $32 
(Premium quality, single-sided, double density, with hub rings) 

Vinyl disk pages, 6"x8.5", hold two disks each.....cccccccseveee lO for $6 

Diskette Mailing Protectors (hold 1 or 2 disks)........++...40 cents each 
(Cardboard folders designed to fit 6"X9" Envelopes.) or $25 per 100 

Envelopes for Diskette MailerS....c.ccccccccccccccscccccceces 6 Cents each 


quikLoader EPROM System (SCRG) ...ccccccccccccvcccsseccesscesee (1/9) $170 
PROmMGRAMER CSCRG) icc:a: 0 60 660-066 $0609. 05 1096S 460 0s Ke bes eewneae (S149, 50) $140 
D MAnual Controller (SCRG)....ccccccccccccccccccccvcscevessevee (990) $85 
Switch-a-Slot (SCRG) 46 vi-wawnww sooo we bow © re ee eee ew ewe aw eee ele0) $175 
Extend-a-Slot (SCRG) v0 aden eee eae oS ba a Wee oe eS ae he wo we eee eee eso) $32 
Write Guard Disk Mod Kit (Mark LV) eh oa aes N66 ORES ORS OSes es $40 


BookS, BOOKS, BOOKS....cccccsseccccccseceeessCOMpare Our discount prices! 


“Inside the Apple //e", Little... ccccccccccccccescvecese (919.95) $18 
“Apple II+/IIe Troubleshooting & Repair Guide", Brenner.($19.95) $18 
“Apple ][ Circuit Description", Gayler...cccccccccccccees ($22.95) $21 
"Understanding the Apple II", Sather.cccccccccccccccccee (9220.99) $21 
“Enhancing Your Apple II, vol. 1", Lancaster.....ceeseeeee ($15.95) $15 
Second edition, with //e information. 
“Assembly Cookbook for the Apple II/IIe", Lancaster.....($21.95) $20 
“Incredible Secret Money Machine", LancaSter.....ccccceeee ($7.95) $7 
"Beneath Apple DOS", Worth & LECHNELr...ccccccecccccccere (919.95) $18 
“Beneath Apple ProDOS”, Worth & LeChner....ccccccccceces (919.95) $18 
“What's Where in the Apple", Second Edition...cccecceeee ($19.95) $19 
"6502 Assembly Language Programming", Leventhal.........($18.95) $18 
"6502 Subroutines", Leventhal...cccescccccsccccccsecvese (918.95) $18 
“Real Time Programming -- Neglected Topics", Foster...... ($9.95) $9 
"Microcomputer GraphicS"“, MYeErS.cccccccccccccccvcccscese ($12.95) $12 
“Assem. Lang. for Applesoft Programmers", Finley & Myers($16.95) $16 


Add $1.50 per book for US shipping. Foreign orders add postage needed. 
Texas residents please -add 6 1/8 & sales tax to all orders. 
*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 *** 
zak 


kkk (214) 324-2050 
*** We accept Master Card, VISA and American Express *** 
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The file buffer initializer gets called during the boot 
procedure, and by the MAXFILES command processor. There are 
two input parameters: the start of buffers address at $9D00, 
and the number of file buffers at S$AA57. The job of the 
initializer is to fill in the four address values at the top of 
each buffer, to store a 00 byte in the first character of the 
filename of each buffer, and to store a new value in the HIMEM 
variable for the current language. Here's the way it was, 
without comments. 


1000 *SAVE S.INIT BUFFERS 1490 PLA 

1010 S---eenmnennn nnn nnn enn nnn nnn 1500 PHA 

1020 PNTR -EQ $40, 41 1510 INY 

eh -EQ $4C,4D 1520 STA (PNTR),Y 

1040 FP.STRINGS .EQ oF Tt cea, INY 

1050 FP. EQ $73, 1540 TXA 

a mee Reh gar 

1060 BUF. START ~EQ $9D00 yt BEQ .2 

1090 NO.FILES EQ rere 1580 TAX 

1100 TEMP -EQ $AA 2 1590 PLA 

1110 ACTIVE.BASIC.FLAG .EQ $AAB 1600 SEC 

1130 TOR $AqDN 1620 TNY @* 

11fo TA Saba 1e8e STA (PNTR),Y 

1150 Beemne nnn nn nnn nw mew nnn 1640 PHA 

1160 INIT.FILE.BUFFERS 13a TXA 

ake SEC 1660 SBC #0 

1180 LDA BUF.START yt INY 

1190 STA PNTR 1680 STA (PNTR),Y 

1200 LDA BUF.START+1 1690 STA PNTR+1 

1210 STA PNTR+1 1700 PLA 

1220 LDA NO.FILES 1710 STA PNTR 

La STA TEMP 1720 JMP .1 

1 1730 Dosen aed aseedeeciaseeoss 

1250 .1 LDY #0 1740 .2 PHA 

1260 1750 LDA #0 

1270 STA (PNTR),Y 1760 INY 

38 EE sit CTD 

1300 LDA PNTR 1790 STA (PNTR),Y 

1310 SBC #$2D ; rf ati ACTIVE.BASIC.FLAG 
NTR+1 1830 STA FP.HIMEM+1 

i ae # 1840 ora FP. STRINGS+1 

1 if STA (PNTR),Y 1860 STA FP.HIMEM 

1380 TAX Lh STA FP.STRINGS 

1390 DEX 18 0 RTS 

1400 PLA 1 3° fnew mere n erent eer eenecenn 

1410 PHA 1900 .3 PLA 

1420 INY 1910 STA HIMEM+1 

ae STA (PNTR),Y 1920 STA PP+1 

1440 TXA tt PLA 

138 INY 1940 STA HIMEM 

1460 STA (PNTR),Y 1950 STA PP 

Ly TAX 1380 RTS 

14.80 DEX 1970 #---------------------------- 


I rearranged the code, kept mental track of carry status, 
optimized register usage, and lopped off 11 bytes. Speed is no 
issue, because it is not a time critical operation anyway, but 
Mine may be a tad quicker. Compare the two versions, and you 
can learn a few tricks for your own use. 
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1000 ®SAVE S.INIT BUFFERS (S-C) 
1020 # REPLACEMENT FOR DOS 3:3 CODE 
1030 e SAVES 11 BYTES, NO CHANGE IN FUNCTION) 
4O- 1050 PNTR EQ $40,41 
ice 1060 ~EQ $4C, 4D 
6F- 1070 FP. STRINGS EQ $6F,70 
13- 1080 FP.HIMEM EQ $73,74 
CA- 1090 PP -EQ $CA,CB 
gp00- 1110 BUF.START -EQ $9D00 
AAT - 1120 NO.FILES EQ $AA 
AAG 3- 1130 TEMP EQ $AA 
AAB6- 1149 ACTIVE.BASIC.FLAG EQ $AAB 
1160 .OR gAzD4 
1170 TA $08D4 
1190 INIT.FILE.BUFFERS 
A7TD4- AD 21 AA 1200 LDA NO.FILES DO (NO.FILES) TIMES 
ATDT- 8D 3 AA 1210 STA TEMP USE TEMP FOR COUNTER 
ATDA- AD 0 gp 1220 LDA BUF.START POINT TO FIRST BUFFER 
A7DD- AE 01 9D 1230 . LDX BUF.START+1 
ATEO- 85 40 1250 .1 STA PNTR 
ATE2- 86 41 1260 STX PNTR+1 
ATE4- AO 00 Ha LDY #0 Store zero over ist char of 
ATE6- 98 1280 TYA filename to mark it as a 
ATE7~- 91 40 1290 STA (PNTR),Y free buffer. 
1300 #.--FILL IN 3 PNTRS-------------- 
ATE9- 38 1310 SEC COMPUTE LOW BYTE OF POINTERS 
ATEA- AS 40 1320 LDA PNTR 
AT7TEC~ E9 2D 1330 SBC #$2D 
ATEE- AO 1E 13 0 LDY f 1E ..eFMW ADDR 
ATFO- 91 40 1350 STA (PNTR),Y 
ATF2- AO 20 1360 LDY #$20 ..TSL ADDR 
A7F4~ 91 40 1379 STA (PNTR),Y 
A EQ AO 22 1380 LDY $22 .» DATA ADDR 
AT7TFB- 91 40 1390 STA (PNTR) ,Y 
ATFA- 48 1400 PHA 
ATFB- A5 41 1410 LDA PNTR+1 COMPUTE HIGH BYTE OF FMW ADDR 
AT7FD- E9 00 1420 SBC 
ATFF- AO iF 1430 LDY #$1F .. FMW ADDR 
A801- 91 40 1440 STA (PNTR),Y 
A803~ £9 01 1450 SBC #1 
A Ob AO ed 1460 LDY #301 -.TSL ADDR 
A807~ 91 4o i870 STA (PNTR),Y 
A809~ EQ 01 1480 SBC #1 
A8OB- Ad 23 14.90 LDY #$23 .» DATA ADDR 
A80D- 91 40 1500 STA (PNTR) Y 
1510 #---IS THAT THE LAST BUFFER?----- 
A80F- C8 1520 INY POINT AT FWD LINK LO-BYTE 
A810— AA 1339 TAX SAVE HI BYTE OF DATA ADDR 
A811- CE 63 AA 15 DEC TEMP 
A814—- FO 1 1550 BEQ .2 ...NO MORE BUFFERS 
1560 #---BUILD LINK TO NEXT BUFFER---- 
A816—- 68 1570 PLA GET LO BYTE 
A 7- E9 26 1580 SBC $26 ADDR OF FILENAME IN NEXT BUFFER 
A81B- 48 1600 PHA SAVE ON STACK 
A81C- 8A 1610 TXA GET HI BYTE 
A81D- E9 00 1920 SBC #0 
A81F- C 16 30 INY ..-HI BYTE 
A820- 91 40 1640 STA (PNTR),Y 
A822~ 1650 TAX SAVE IN X 
A823- 68 1660 PLA GET LO BYTE AGAIN 
1680 #---SET FORWARD PNTR = 0000------ 
A826- AQ 00 1690 .2 LDA #0 
A828- a 40 1790 STA (PNTR),Y 
AS2A- 1710 INY 
A82B- 91 40 1720 STA (PNTR),Y 
1730 #..--SET HIMEM AND EMPTY BLOCK---- 
A82D- AD B6 AA if 0 LDA ACTIVE.BASIC.FLAG 
A830- FO OA 1750 BEQ . INTEGER BASIC 
A832—- 86 74 1760 STX FP.HIMEM+1 AP PLESOFT 
A834~- 86 70 1770 STX FP.STRINGS+1 
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AR3O- 88 1780 PLA 

AS37- 85 73 1790 STA FP.HIMEM 

A839- 65 6F 1860 STA FP. STRING 

a ee 
- é + 

AS 3E- CB 1830 STX PP+1 

A8hO- 68 1840 PLA 

A841- 85 4C 1850 STA HIMEM 


Agda- &3 


I found it even more interesting to re-write this program using 
the 65802 capabilities. The 16-bit registers save a lot of 
byte shuffling, and eliminate the need for TEMP and PNTR. 
What's more, instead of saving only 1l bytes over the original 
DOS 3.3 version, this time I whacked out 46 bytes! And it 
could be made even smaller, if we could make some assumptions 
about the CPU status. 


In general, we don't know whether we are in 65802 or 6502 mode 
until we peek at the "hidden" status bit (the E-bit). In the 
process of peeking we may change it, and may also change the M- 
and X-bits. Lines 1190 save the current status, flip into '&02 
mode and save the status again. The first PHP is there in case 
we were already in '802 mode. If we were, it saves the M- and 
X- bits and they will be restored by the PLP at line 1620. The 
second PHP saves the status of the mysterious E-bit (the XCE 
opcode swaps E and C). Lines 1600-1610 pull this saved status 
and do another XCE, restoring E to what it was when this sub- 
routine was called. If we could ASSUME that we were called in 
*802 mode, we could delete lines 1190-1210 and lines 1610-1620 
(saving 5 more bytes). Or, if we could be sure we were always 
called from 6502 mode, we could delete 1190, 1220, and 1620, 
and change line 1600 to ".4 SEC" (saving 3 bytes). Probably 
better never to assume, at least until we are a lot more 
familiar with this marvelous chip. 


The XCE instruction swaps the C- and E-bits, but that is not 
necessarily all. The M- and X-bits always come up in the 8-bit 
mode after an XCE. Therefore in line 1240, the LDX will load 
$00 into the high byte of the X-register and the number ot 
buffers into the low byte. In line 1250 I turn on 16-bit mode 
for both indexing and memory-accumulator operations, and I will 
keep it that way until the PLP at line 1600. 


6502 programs are always full of page zero pointer aadressing 
modes, but in 65802 programs we may see a lot less of them. 
Now we can load a whole 16-bit address into the X- or Y- 
register. 


We can write: 


Instead of: 
BUF. PNTR 
PNTR 

BUF. PNTR+1 
PNTR+1 


#S1E 
DATA... 
(PNTR) ,Y 
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LDY BUF.PNTR 
LDA DATA... 
STA $1E,Y 
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FONT DOWNLOADER & EDITOR ($39.00) 

Turn your printer into a custom typesetter. Downloaded characters remain active while printer is powered. 
Use with any Word Processor program capable of sending ESC and control codes to printer. Switch back and 
forth easily between standard and custom fonts. All special printer functions (like expanded, compressed etc.) 
apply to custom fonts. Full HIRES screen editor lets you create your own characters and special graphics 
symbols. Compatible with many parallel printer I/F cards. User driver option provided. For Apple Ii, Ii+, //e. 
Specify printer: Apple Dot Matrix, C.ltoh 85 10A (Prowriter), Epson FX 80/100, or OkiData 92/93. 


NEW ! !! The Font Downloader & Editor for the Apple imagewriter Printer. For use with 
Apple Il, I+, //e (with SuperSerial card) and the new Apple //c (with builtin serial interface). 


NEW !!! FONT LIBRARY DISKETTE #1 ($19.00) contains lots of user-contributed fonts for all 
printers supported by the Font Downloader & Editor. Specify printer with order. 


DISASM 2.2e - AN INTELLIGENT DISASSEMBLER ($30.00) 

Investigate the inner workings of machine language programs. DISASM converts machine code into meaningful, 
symbolic source. Creates a standard text file compatible with S-C, LISA, ToolKit and other assemblers. Handles 
data tables, displaced object code & even lets you substitute your own meaningful labels. (100 commonly used 
Monitor and Pg Zero names included.) An address-based triple cross reference table is provided to screen or 
printer. DISASM is an invaluable machine lanquage learning sid to both novice & expert alike. Don Lancaster 
says DISASHM is “absolutely essential” in his new ASSEMBLY COOKBOOK. For entire Apple I! family including the 
new Apple //c (with all the new opcodes). SOURCE CODE available for an additional $30.00 


S-C Assembler (Ver 4.0 only) SUPPORT UTILITY PACKAGE ($30.00) 

* SC _XREF - Generates a GLOBAL LABEL Cross Reference Table for complete documentation of source listings. 
* SC.GSR - Global Search & Replace eliminates teadious manual renaming of labels. Search all/part of source. 
* SC.TAB - Tabulates source files into neat, readable form. SOURCE CODE available for an additional $30.00 


The ‘PERFORMER’ CARD ($39.00) 

Plugs into any slot to convert a ‘dumb’ centronics-type printer I/F card into a ‘smart’ one. Command menu 
eliminates need to remember complicated ESC codes. Features include perforation skip, auto page numbering 
with date & title. includes large HIRES graphics & text screen dumps. Specify printer: MX-80 with 
Graftrax-60, MX-100, MX-80/100 with Graftraxplus, NEC 6092A, C.ltoh 6510 (Prowriter), OkiDats 62A/85A 
with Okigraph & OkiData 92/93. SOURCE CODE: $30.00 


FIRMWARE FOR APPLE-CAT: The ‘MIRROR’ ROM ($25.00) 

Communications ROM plugs directly into Novation'’s Apple-Cat Modem card. Basic modes: Dumb Terminal, 
Remote Console & Programmable Modem. Features include: selectable pulse or tone dialing, true dialtone 
detection, audible ring detect, ring-back, printer buffer, 80 col card & shift key mod support. Uses superset of 
Apple's Comm card and Micromodem II commands. SOURCE CODE: $50.00 


RAM/ROM DEVELOPMENT BOARD ($30.00) 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip (6116 type RAM for program development 
or 2716 EPROM to keep your favorite routines on-line). Maps into $Cn00-CnFF and $C800-CFFF. 


NEW !!! C-PRINT For The APPLE //c ($99.00) 


Connect standard parallel printers to an Apple //c. C-PRINT is a hardware accessary that plugs into the 
standard Apple //c printer serial port. The other end plugs into any printer having a standard 36 pin 
centronics-type paraliel connector. Just plug in and print! High speed data transfer at 9600 Baud. No need to 
reconfigure serial port or load software drivers for text printing. 


Avoid a $3.00 postage/handling charge by enclosing full payment with order. (Mastercard & VISA excluded) 
RAK-WARE 41 Ralph Road W. Orange NJ 07052 (201) 325-1885 


SCEEECEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 
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Lines 1280-1290 zero the first byte of the filename. As an 
“extra” feature now, the second byte is also zeroed. In lines 
1300-1380 I can compute and store the three area pointers in a 
very straightforward manner. It now occurs to me that by 
Swapping the roles of the X- and Y-registers I could save six 
more bytes, since the STA Soffset,X instructions would assemble 
in two bytes rather than three. (The only problem might be 
that the D-register must = $0000 for this to work.) 


Since I don't have to use the X-register to hold temporary 
values during the buffer creation loop, I can use it instead to 
count buffers. Lines 1400-1410 do the counting. 


If we have not just built the last buffer, lines 1420-1460 set 
the “next buffer" link address and branch back to build another 
buffer. 


Lines 1470-1500 save the address of the data area in the X- 
register and store 0000 in the link address for the last 
buffer. The data area address is going to be the new HIMEM 
value. 


Lines 1510-1590 store the new HIMEM value for the currently 
selected language. If we are in Applesoft, the string area 
normally bumps against HIMEM; we now empty that area, because 
HIMEM may have moved. If we are in Integer BASIS or the S-C 
Assembler (which fools DOS into believing it is I/B), the 
source program nestles against HIMEM; it is therefore emptied 
by storing the HIMEM value into PP. 


Won't it be nice when we all have 65802's and can USE these new 
code segments? It may not be as long as you think. In the 
mean time, maybe we can develop our expertise. And we can 
carve enough holes in DOS to leave room for some great new 
features. 


1000 *SAVE S.INIT BUFFERS (802) 

1010 ~OP 65816 

1020 Beene nnn ee ne eee 

1030 ® REPLACEMENT FOR DOS 3.3 CODE 

1 7 (SAVES 46 BYTES, NO CHANGE IN FUNCTION) 
4C- 1060 HIMEM -EQ $4C,4D 
CA- Leta PP -EQ $CA,CB 
9D00- 1110 BUF.START ~EQ $9D00 
AA5T=- 1120 NO.FI “ER aah 
AABO- Us ACTIVE.BASIC.FLAG ~-EQ $AA 

1150 OR ay 

ee P -TA $08D4 

1180 INIT.FILE.BUFFERS 
OOATD4- 08 1190 PHP SAVE CURRENT STATUS AND 
Ooh Te 18 1200 CLC TURN ON 802 MODE 
OOA7TDO=- FB 1210 XCE 
OOATDT- 08 ea . PHP 
OOA7D8- AE 57 AA 1540 LDX NO.FILES DO (NO.FILES) TIMES 
QOATDB=- C2 30 1250 REP #$30 16-BIT OPERATIONS 
OOA7DD= AC 00 9D i370 ; LDY BUF.START POINT TO FIRST BUFFER 


Page 8..... Apple Assembly Line.....March, 1985.....Copyright (C) S-C SOFTWARE 


OOATEO- 
OOA7TE3- 


OOATE6- 
OOATET- 
OOATES- 
OOATEB- 
OOATEE- 
OOATF1i- 
OOATF4- 
OOATFT- 


OOATFA- 
OOATFB- 


OOATFD- E9 26 
OOA3800- 22 24 
00A803- 

OOA804= 80 DA 


OOA806—= AA 
OOA807= AQ 00 
OOAB0A- 99 24 


OOA80D= AD B6 
00A810- 29 FF 
00A813- FO 06 
00A815- 86 73 
OOA817- 86 f 
00A819- 80 0 
00A81B- 86 AC 
OOA81D=- 86 CA 
OOA81F- 28 
00A820~ FB 
O0OA821~ 28 
O0A822- 60 


oo 
oo 
oo 
oo 


"0 OMOROMOW WP 
OF OWOWWOWW@G Wo 
me N 
ro) oO 
ooo0oe°o 
o=mO—-00 


oo 
oo 


or OO 
or OO 


awh and ont ood 


FES LWWWWWWWW WW APO 


ee ce ch ch ce ce ce ed ed wd ch we ek ced dh ce eh ed oe ct cet cee eh ond ne ed ced eed ee eh oh ed oh 


AXRDAQGCDANNO1 U1 UIOIOIU U1 fe fe ee ee 


STA 


2 


DEX 
BEQ .2 


NOW OI QU By) A) =a CLO CO 
olejlolelolololololoeloeloloralololol=l—) 
2) 

w 
Q 


SBC 


Own Sw 


02 


1 LDA ##0 


0,Y 
$100 
STA Y 

#---IS THAT THE 


STA $24, Y 
TAY $24, 


STORE ZERO OVER 1ST & 2ND CHARS 


OF FILENAME TO FREE BUFFER 


0,Y 
#.--FILL IN 3 PNTRS---~----------- 


COMPUTE LOW BYTE OF POINTERS 
FROM FILENAME ADDR 


oe FMW ADDR 
-eeToL ADDR 


«+ «DATA ADDR 
LAST BUFFER?----- 


~«eNO MORE BUFFERS 


#---BUILD LINK TO NEXT BUFFER---- 
##$26 


ADDR OF FILENAME IN NEXT BUFFER 


BASE ADDRESS FOR NEXT BUFFER 
.- - ALWAYS 


BRA .1 
8---SET FORWARD PNTR = 0000------ 


TAX 
LDA tS 
STA $24,Y 


SAVE HIMEM VALUE 


$---SET HIMEM AND EMPTY BLOCK---- 


CO~I A 


STX PP 


Os ooo sooo pobono eb sa 
em 
= 
o 


SwWwN3O 


STX FP.HIMEM 
STX Fp. STRINGS 


3 STX HIMEM 


LDA jane 
##$FF 


INTEGER BASIC 
AP PLESOFT 


INTEGER BASIC 


Now you can monitor and control the world (or at least your part of it) with a little help from 


APPLIED ENGINEERING 


12 BIT, 16 CHANNEL, 


PROGRAMMABLE GAIN A/D 
All new 1984 design incorporates the 
latest in state-of-art ILC. technologies. 
Complete 12 bit A/D converter, withan 
accuracy of 0.02%! 


16 single ended channels (single ended 
means that your signals are measured 
against the Apple’s GND.) or 8 
differential channels, Most all the 
signals you will measure are single 
ended. 

9 software programmable full scale 
ranges, any of the 16 channels can have 
any range at any time. Under program 
control, you can select any of the 
following ranges: +10 volts. +5 
+2.5V, +1.0V, +S5OUMV, =250MV. 
+100MV. +50MV. or = 25MV 

Very fast conversion (25 micro seconds) 
Analog input resistance greater than 
1,000,000 ohms. 

Laser-trimmed scaling resistors. 

Low power consumption through the 
use of CMOS devices. 

The user connector has -12 and -12 
volts on it so you can power vour 
sensors. 

Only elementary programming ts 
required to use the A/D. 

The entire system is on one standard 
size plug in card that fits neatly inside 
the Apple. 

System includes sample programs on 


alisk. PRICE $319 


8 BIT, 8 CHANNEL A/D 
8 Channels 
8 Bit Resolution 
On Board Memory 
Fast Conversion (078 ms per channel) 


A/D Process Totally Transparent to 
Apple Gooks lke memory) 


The APPLIED) ENGINEERING A/D 
BOARD 1s a7 8 bit. 8 Channel, memory 
buftered data acquisition system. It 
consists of an 8 bit A/D converter, an 8 
channel! mu tiplexer and 8 x & random 
AC Cess MEMON 


The analog vo dietal converston takes 
place ong continuous, channel 
sequencing nasis, Data 1s automatically 
transterred 10 on board memory at the 
end of each conversion, No A/D 
converter could be easier to use 

Our AD board comes standard with 0. 
TON tull sca e inputs. These inputs can 
be chaneed by the user to 0. - TOV, of 
SN =35\ of other ranges as needed. 
The user connector has +12 and -12 
sails ON HT sO VOU Can Power yOUr 
sensors 


@ Accuracy. 3%. 
@ input Resistance: 20K Ohms Typ 


PRICE $129.00 


A few applications may include the monitoring of @ flow @ temperature @ humidity 
@ wind speed e@ wind direction @ light intensity @ pressure © RPM ®@ soil moisture 


and many more. 


SIGNAL CONDITIONER 


Our 8 channel signal conditioner is designed for use with both our A/D converters. This 
board incorporates 8 F.E.T. op-amps, which allow almos* any gain or offset. Forexample: an 
input signal that varies from 2.00 to 2.15 volts or a signal that varies from 0 to 50 mV can 
easily be converted to 0-10V output for the A/D. 


The signal conditioners outputs are a high quality 16 pin gold 1.C. socket that matches the 
one on the A/D'‘s soa simple ribbon cable connects the two. The signal conditioner can be 
powered by your Apple or from an external supply. 


FEATURES 

@ 4.5” square for standard card cage and 4 mounting holes for standard mounting, The 
signal conditioner does not plug into the Apple, it can be located up to mile away from 
the A/D. 
22 pin .156 spacing edge card input connector (extra connectors are easily available ie. 
Radio Shack). 
Large bread board area. 


Full detailed schematic included. 


PRICE $79.00 


DIGITAL INPUT/OUTPUT BOARD 


@ Your inputs can be anything from high 
* speed logic to simple switches. 
@ Very simple to program. just PEEK at the 
Powerup reset assures thal all outputs data. 
are off when your Apple ts turned on. @ Now. on one card, youcan have 8 digital 
Features 8 inputs that can be driven outputs and 8 digital inputs each with its 
from TTL logic or any 5 volt source. own connector. The super input/output 
board ts your best choice for any control 
application. 
The SUPER INPUT/OUTPUT board manual includes many programs for inputs and outputs, 
A detailed schematic is included. 
Some applications include: 
Burglar alarm, direction sensing, use with relays to turn on lights, sound buzzers, start 
motor, Control tape recorders and printers, use with digital joystick, PRICE $69.00 


Provides 8 buffered oulputs to a 
standard 16 pin socket for standard dip 
nbbon cable connection. 


Please see our other full page ad in this magazine for information on Applied Engineering's Timemaster Clock Card and other products for the Apple. 
Our boards are far superior to most of the consumer electronics made today. All I.C.’s are in high quality sockets with mil-spec. components used throughout. P.C. boards are glass-epoxy 
with gold contacts. Made in Amenca to be the best in the world. All products compatible with Apple Il and //e. 


Applied Engineering > products are tully tested with complete documentation and available for immediate detivery. All products are guaranteed with a no hassle three year warranty. 


Texas Residents Add 5% Sales Tax 
Add $10.00 If Outside U.S.A. 


Send Check or Money Order tu: 
APPLIED ENGINEERING 
P.O. Box 798 
Carroliton, TX 75006 


Call (214) 492-2027 
7 a.m, to 11 p.m. 7 days a week 
MasterCard, Visa & C.0.D. Welcome 
No extra charge for credit cards 
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65C02s in OlG: ADDIS 6 12vwid 40 be bb bes i608 64455006050 20 Sather 


I read Andrew Jackson's 12/84 AAL comments on 65C02 operation 
in an Apple II with interest since I had looked into the same 
subject while doing research for “Understanding the Apple IIe". 
I share Mr. Jackson's conclusion that the problem is short read 
data setup time from motherboard RAM, but I disagree with his 
analysis and conclusion that a 65C02 only gets a setup of 25 
nsec in an Apple II. 


The motherboard RAM read data setup time in an Apple II is 


70 nsec (one 14M period) 
minus LS174 pin 9 to data out propagation delay (B5/B8 latch) 
minus LS257 data propagation delay (B6/B7 mux) 
minus 8304 or 8T28 data propagation delay (H10/H11l driver) 
plus MPU PHASE 0 to PHASE 2 propagation delay 
plus 74LS08 propagation delay (Bll PHASE 0 gate). 


Longer PHASE 0 - PHASE 2 delays result in longer read data 
setup time, not shorter. With the 6502s and 65C02s I have 
experimented with, PHASE 0 to PHASE 2 delay has always been in 
the 20-40 nsec region. Whatever the variation, I have found no 
NCR or GTE 65C02 that will work in my Apple II. 


Taking all delays into account, the motherboard read data setup 
time for a 6502 or 65C02 is about 65 nsec. This is not good 
enough for 1 MHz 6502/65C02 specifications but it is good 
enough for 2 MHz 6502/65C02 specifications. In other words, 
the Apple II does not meet the read data setup spec of the l 
MHz 6502 that it was manufactured with. Based on this fact, 
the 100 nsec read data setup spec of 1 MHz 6502s is 
unrealistically conservative. 


But why won't a 2 MHz 65C02 run in the Apple II if it requires 
only 50 nsec setup time and it gets 65 nsec? The answer, in my 
Opinion, is that NCR and GTE 2 MHz 65C02s do not operate to 
Spec. With certain instruction sequences, they require more 
than 50 (and, in fact, more than 65) nsec read data setup time. 
The instruction sequences that bomb are VERY limited, so the 
65C02 only gets into trouble when a certain few code sequences 
are executed. The 65C02 symptom in the Apple II is, therefore, 
that most things work, but some don't. 


Efforts to improve 65C02 operation in the Apple II can be 
concentrated on decreasing data delays (by replacing the LS174s 
and LS257s with equivalent devices from a faster logic family) 
Or increasing MPU data clock delays (by adding TTL devices in 
series with the MPU PHASE 0 input). Possible reduction in data 
delays is limited, so increased MPU PHASE 0 delay is tempting. 
Be forewarned, though, that 6502 PHASE 2 is already very late 
for peripheral slot and serial input mux data transfer, and 
that such data transfer already depends on the long bleed off 
time of data from the floating data bus. It is certainly 
feasible that some Apples with heavy data bus loads will begin 
to show bugs if any MPU PHASE 0 delay is introauced. But in 
all probability, you can increase the MPU PHASE 0 delay in a 
given Apple until MPU PHASE 2 falls concurrently with RAM 
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SELECT' after access to an address above SCOOF in the Apple Il. 
This point is 60 nsec after peripheral slot PHASE 0 falls in my 


Apple II. 


AAL readers may be interested in the following excerpt from 
“Understanding the Apple IIe". It details some features of the 
65C02 which are not clear from the data sheet and describes 
instruction sequences that I have found that make NCR and GTE 
65C02s bomb in an Apple II. Note particularly that I have a 
Rockwell 1 MHz 65C02 that operates without a hitch in my Apple 
II. This may be a lucky coincidence, or Rockwell 65C02s may 
not have the read data setup problems of the NCR and GTE chips. 


[ Following is an excerpt from “Understanding the Apple //e", 
copyright (c) 1985 by Quality Software, published here by 
permission of Quality Software. ] 


THE 65C02 MICROPROCESSOR 


A recent development in the 6502 world has been the 
introduction of the 65C02 MPU. This MPU (manufactured by NCR, 
Rockwell, and alternate sources) is fabricated using CMOS 
technology, instead of the NMOS used in the 6502. The general 
advantage of CMOS over NMOS is lower power consumption, but the 
65C02 also has some new instructions which make it 
operationally more powerful than its NMOS brother. A 65C02 can 
execute any 6502 program that doesn't depend on fine 
instruction execution timing, but a 6502 cannot execute 65C02 
programs that utilize the new 65C02 instructions. 


Apple uses the 65C02 MPU in the Apple //c microcomputer, and 
they intend to convert the Apple //e over to the 65C02. The 
plan is to retrofit older Apple //e's with the 65C02 as part of 
the firmware upgrade package described in Chapter 6. This will 
maximize compatiblity betweeen the Apple //e and the Apple //c, 
and make it possible to write shorter and faster Apple //e 
assembly language programs. Because the Apple //e may become a 
65C02 based computer in the future, some data on the 65C02 is 
given here and in other parts of “Understanding the Apple //e". 


The 65C02 improvements consist of the addition of new 
instructions and addressing modes, and the removal of some old 
6502 bugs. For the most part, differences between the 6502 and 
65C02 are well documented in the partial NCR 65C02 data sheet 
in Appendix C at the back of this book. Descriptions here will 
therefore be limited to a few points whose ramifications are 
not made entriely clear by the data sheet. Please note also 
that details of 65C02 instruction execution are given in Tables 
4.3 and 4.4 in an application note later in this chapter. 


First, the NCR and Rockwell 65C02s are not identical. The 
Rockwell chip executes some instructions that are not part of 
the NCR 65C02 repertoire. These are the zero page 
instructions RMBn (Reset Memory Bit n) and SMBn (Set Memory Bit 
n), and the zero page relative branch instructions BBRn (Branch 
on Bit n Reset) and BBSn (Branch on Bit n Set). The opcodes oft 
these Rockwell instructions ($X7 and SXF) represent NOPs in the 
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NCR chip. Apple appears to be using NCR compatible 65C02s in 
its computers, but the Rockwell chip works fine in the Apple 
//e. Please refer to Tables 4.3 and 4.4 for details of the 
additional Rockwell instructions. 


The READY line of a 6502 will not halt the MPU during a write 
cycle, but the 65C02 READY line will. This raises the 
question, “what happens to the Apple IIe data bus if READY is 
pulled low during a write cycle and is held low for a number of 
following write cycles?” If the 65C02 attempts to control the 
data bus constantly for a series of wait state write cycles, it 
will compete with motherboard RAM for control of the data bus 
near the end of PHASE 1. Investigation shows that this is not 
a problem. During a long series of wait state write cycles, 
the 65C02 control the data bus only during that portion of the 
machine cycle in which it controls the data bus during a normal 
write cycle. Therefore, its data bus connection is at high 
impedance during the majority of PHASE 1 in all wait state 
write cycles, and motherboard RAM is free to control the data 
bus near the end of PHASE l. 


The fact that interrupts do not cause abortion of a BREAK 
instruction is listed as an operational enhancement of the 
65C02 on page 3 of the data sheet. The data sheet is referring 
to non-maskable interrupts, not interrupt requests. In a 6502 
or 65C02, IRQ' falling after a BREAK op code fetch does not 
interfere with BREAK execution. However, if NMI' falls after a 
BREAK op code fetch and before the interrupt vector is fetched 
in a 6502, then the NMI' interrupt vector is fetched, and the 
NMI' handler is executed. An RTI at the end of the NMI' 
handler causes return to the address (plus two) of the BREAK 
instruction and probable program crashing. This bug is fixed 
in the 65C02. As the data sheet indicates, NMI' falling during 
BREAK execution results in NMI' execution after BREAK execution 
is complete. 


The NCR data sheet refers to the new increment accumulator and 
decrement accumulator instrucions as INA and DEA. I don't know 
why they do this, because these instructions are clearly just 
new addressing modes of the INC and DEC instructions. The new 
Mnemonics should be INC A and DEC A or just INC and DEC as 
given in the Rockwell data sheet. The addition of the INC and 
DEC accumulator addressing modes means these instructions have 
all the addressing modes of the other 6502 read-modify-write 
instructions (ASL, LSR, ROL, and ROR). 


Another notable feature of the 65C02 data sheet is the 5000- 
microsecond maximum cycle time in the AC characteristics table 
on page 3. I take this to mean that you can stop the clock tor 
a guaranteed minimum of 5000 microseconds with PHASE 0 high, 
but not with PHASE 0 low. The Rockwell data sheet is more 
Specific about the difference. It states: "The input clock 
can be held in the high state indefinitely; however, if the 
input clock is held in the low state longer than 5 
microseconds, internal register and data status can be lost". 
The significance is that, when the Apple IIe DMA‘ line is held 
low, it forces the PHASE 0 input to the MPU to a low state. I 
therefore conclude that long term continuous DMA in the Apple 
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RAMWORKS' 
800K Apple Works Desk Top, 450K Visicalc, 
1 Meg Solid State Disk 
Double Hi-Res, RGB, Totally Apple Compatible! 
RAM WORK 
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RAMWORKS"”—A card that plugs 
into the Apple Ile auxiliary slot and 
functions EXACTLY like Apple's 
extended 80 column card (in fact. a 
128K RAMWORKS” actually costs 
less than Apple's 64K extended card) 
but with RAMWORKS”™ you get more 
memory, 80 column text, a 3-year 
warranty and most importantly. room 
to grow without using more slots. A 
design so advanced there's a patent 
pending on it. If you have a llc or an 
IBM, we suggest you do what every- 
body does, trade it in ona lle. 

RAMWORKS”™ can be purchased 
in a wide range of sizes and is user 
upgradeable using either64K RAMS 
or the new 256K RAMS. In fact. 
RAMWORKS" is the only auxiliary 
slot card on the market that will allow 
the new 256K RAMS to be used. If 
you already have an extended 80 
column card, no problem. Just un- 
plug the 64K RAMS and plug them 
into the RAMWORKS” for an addi- 
tional 64K. A RGB option is also 
available, you can order it with your 
RAMWORKS” card or add it on ata 
later date. 

RAMWORKS” saves you time. 
money, slots and hassle. You'll have 
additional memory NOW and in the 
future. 


Ramworks™ 

64K Installed 
128K Installed 
256K Installed .... 
512K Installed .. 

1 MEG Installed 
RGB Option.... 


(May be added later 
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LOW COST SOFTWARE OPTIONS 


Ram Drive Ile 

Ram Drive lle will give you a high 
speed solid state disk drive. The 
Ram Drive Ite software features 
audio-visual access indicators, easy 
setup for turnkey operation, and easy 
menu driven documentation. The 
program can be modified and is 
copyable. If you have a 64K RAM- 
WORKS”, Ram Drive Ile will act as 
half a disk drive. If you have a 128K 
or larger RAMWORKS”, Ram Drive 
lle will act as a full disk drive. Either 
way, your programs will load and 
save over 20 times faster. Ram Drive 
Ile is compatible with APPLESOFT, 
PRO DOS. DOS 3.3. and PASCAL. 
The disk also includes a high speed 
RAMdisk copying program. Ram 
Drive is another disk drive only 20 
times faster. And no whirring. clicking 
and waiting! PRICE $29 


CP/M Ram Drive Ile 

CP/M Ram Drive lle is just like the 
Ram Drive tle above. only for CP/M. 

CP/M Ram Drive Ile runs on any 
Z-80 card that runs standard CP/M 
i.e. Applied Engineering Z-80 Plus or 
Microsoft Soft Card. CP/M Ram Drive 
will dramatically speed up the opera- 
tion of most CP/M software because 
CP/M normally goes to disk fairly 
often. Fast acting software like 
dBase !!. Wordstar and Turbo Pascal 
becomes virtually instantaneous 
when used with CP/M Ram Drive. 

PRICE $29 

VC Ile Expander 


VC Ile expander gives owners of 
Visicalc lle and Advanced Visicalc 
lle increased storage. When used 
with VC Ile you'll get 141K work- 
space (128K RAMWORKS” or larger 
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required). When used with Advanced 
VC Ile you'll get 131K with a 128K 
RAMWORKS"™. 250K with a 256K 
RAMWORKS" and 450K witha 512K 
RAMWORKS” PRICE $29 


Apple Works Expand 


Aithough Apple Works is com- 
patible with all sizes of RAM- 
WORKS", Apple Works only “sees” 
its first 64K bank giving you a 55K 
desktop. Our Apple Works expand 
program will make a modification to 
Apple Works that simply lets it know 
you've got more memory, giving you 
101K work space. PRICE $29 


Super Apple Works Expand 


This souped-up version of Apple 
Works expand doesn't stop at a 101K 
desk top, in fact Super Apple Works 
Expand figures out how much 
memory your RAMWORKS” has to 
give Apple Works the following desk- 
top sizes: 


. APPLEWORKS 
RAMWORKS DESKTOP 


PRICE $39 
AppleWorks can also be putin the 
RAMWORKS” card to eliminate disk 
access, thereby dramatically speed- 
ing up the program. 


APPLIED ENGINEERING 


Senc Check or Money Order 1G 

Applied Engineering 

PO Box 798 Carrollton TX 75006 

Call (214) 492-2027 

8am to lt pm 7 days a week MasterCard Visa & 
COD Welcome No extra charge for credit cards 
Texas residents add 9'-% sales tax Add $1000 if out- 
side USA 
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IIe cannot be performed with a 65C02 any easier than it can 
with a 6502. In either case, long term continuous DMA can only 
be performed by pulling DMA' low after the MPU has been stopped 
Via READY low, and only after the X4 and X5 Apple IIe 
motherboard jumpers have been configured so the MPU clock is 
not stopped when DMA' is pulled low. 


A feature of the 65C02 that does not show up in the NCR data 
sheet is that the new BIT immediate instruction operates 
differently than BIT in the other addressing modes. In the 
other addressing modes, BIT sets the negative, overflow, and 
zero flags based respectively on operand bit 7, operand bit 6, 
and the result of Accumulator AND operand. The 65C02 BIT 
immediate instruction affects only the zero flag, not the 
negative and overflow flags. 


A final point about 65C02 operation that I'd like to make is 
mildly speculative. The 65C02 is pin compatible with the 6502, 
and was designed as a direct but more powerful substitute for 
the 6502. To make it work in the Apple IIe, you simply remove 
the 6502 and plug in the 65C02. However, the 65C02 does not 
work reliably in the older Apple II. I believe that the reason 
for this is that the 65C02 (or at least an NCR 65C02) requires 
read data to be set up longer than a 6502 operating at the same 
frequency. RAM read data in the Apple II becomes valid at the 
MPU (about 60 nsec before PHASE 2 falls) much later than it 
does in the Apple IIe (about 250 nsec before PHASE 2 falls). 
Whereas the 6502 can handle the short RAM read data set up 
time, the 65C02 seems to have trouble with it. 


I have performed limited experiments with 65C02s in an Apple 
II. Basically, I found that two NCR 65C0O2As (2 MHz?) and one 
NCR compatible GTE G65SCO2P-2 (2 MHz) caused intermittent 
program crashing that got worse as the peripheral card data bus 
load was increased. The Rockwell R65CO2P1 (1 MHz) that I tried 
caused no program crashes. The NCR 65C02 program drashes 
occurred only with certain data bus sequences. If an RTS 
instruction is preceded by a NOP or SBC, and the Apple II video 
data preceding the RTS opcode fetch is S$A0, $A2, or SA9 then 
the carry flag is set during otherwise normal execution of the 
RTS instruction. This unwanted setting of the carry flag 
occurred as mentioned with all three NCR type chips. One of 
the chips also set the carry flag if the video data preceding 
the RTS was $89, and another one also set the carry flag if the 
video data preceding RTS was $89 or S$E9. Note that $89, SAO, 
SA2, SA9, and SE9 are all immediate mode 65C02 instructions. 


In these experiments, I did not conclusively prove that the 
problem with the 65C02 in the Apple II is short set up time of 
RAM read data. This is merely a highly educated guess upon 
which I would be willing to bet a paycheck (if only I haa one). 
Setting the data up quicker definitely helps, because the bugs 
mentioned in the previous paragraph do not exist when the 
program reSides in a 16K RAM card whose read data becomes valid 
just after Q3 falls during PHASE 0. In any case, I am 
Suspicious of the validity of the NCR claim of 50-nsec minimum 
read data set up time in its 65C02. 
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Improved DOS 3.3 Number ParsSing.........-e.eeBOb Sander-Cederlof 
& Lower-Case DOS Commands 


Whether Apple knows or not, cares or not, likes it or not, DOS 
3.3 1s still alive. And still the system of choice to most of 
their loyal customers. 


The //c and new //e ROMS patch Applesoft so that lower case 
keywords and commands can be typed without penalty. However, 
Since they are promoting ProDOS and do not care about DOS, they 
did nothing to give DOS the freedom to accept lower case 
commands. I am constantly chafing at the necessity of popping 
the shift lock key up and down, (down for DOS and up for word 
processing). Surely a very small patch woula do the trick. 


I looked around and found the subroutine DOS uses to pick char- 
acters out of the command buffer, at SA193-SAlLAD. Six bytes of 
new code inserted right before the CMP #SAC at SA1Al woulda do 
it. If I put a JSR to a patch in place of the STX SAA5SD at 
SA19E, a ten-byte patch subroutine would solve my problem. 


But where do I get a ten-byte hole to fit this patch into? All 
the holes I know about have already been used now, and I really 
don't want to eliminate any existing features. The only 
solution is to find some loosely written code and rewrite it 
with compactness as the major criterion. 


The code to be recoded must be relatively unused. That is, not 
likely to be called at internal places by sneaky software. I 
found a likely candidate in the number conversion subroutine 
used in parsing DOS commands. This subroutine occupies from 
SA1B9 through $A228. I ran a cross reference on the outer 
shell portion of DOS ($9D84-$A883) using Rak-Ware's DISASM 
program, and verified that there are no entry points into this 
code except at the beginning. It is called from only two 
places, SAQAA and $Al127. 


Here is a commented disassembly of the subroutine: 


hy. 1020 NUML  .EQ $2 
4y5- 1030 NUM EQ $45 
1080 #------ ee ene 
A1A4~- 19 0 GNNB -EQ $A1A4 
1070 -OR $A1B9 
1080 -TA $09B9 
1090 Sxeoesee ccc cc ecseeeeeeeeoceaee 
1100 # RETURN .CC. WITH NUMBER IN A,X 
8 : OR .CS. IF BAD SYNTAX 
1130 CONVERT . NUMBER. IN.WBUF 
A1B9- AQ 00 1140 LDA #0 INIT NUMBER = 0 
A1BB- 85 uy 1150 STA NUML 
A1BD= 85 45 1160 STA NUMH 
A1BF- 20 Au Al 1170 JSR GNNB GET NEXT NON-BLANK CHAR 
A1C2= 08 1180 PHP 
A1C3- C9 A4 1190 CMP #"$" HEX OR DECIMAL? 
A1C7- 28 1210 PLP 
A1C8= 4C CE Ail 1220 JMP .2 -«eDECIMAL (OR NONE) 
1230 #.--NEXT CHAR OF DECIMAL #------- 
A1CB- 20 A4 A1 12h0 .1 JSR GNNB GET NEXT NON-BLANK CHAR 
A1CE- DO 1250 .2 BNE .3 ~~» NOT COMMA OR CR 
A1D0- A6 44 1260 LDX NUML END OF NUMBER 
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A1D2- AS 45 1270 LDA NUMH VALUE IN A,X 
A1D4- 1 1280 CLC SIGNAL VALID NUMBER 
A1D5- 60 1290 RTS RETURN 
1300 #---CONVERT DECIMAL NUMBER------- 
A1D6- 38 1310 .3 SEC CONVERT CHAR TO DIGIT 
A1D7- E9 BO 1320 SBC #$B0 
A1D9- 30 21 1330 BMI oie .. NOT DIGIT 
Ae BO D150 ur .. NOT DIGIT 
AIDF- 20 FE Al 1360 JSR .5 SHIFT VALUE 1 LEFT 
AIE2~ 65 yy 1370 ADC NU 2@VALUE + DIGIT 
A1E5- A 00 1390 LDA #$00 
5 ea a 
Nee ao Pe eS ECB SUPT YAU 1 HER 
A = ° 
AIF1- 65 44 1450 ADC NUML 
tire: Bg 
Rig @5 a5 do ADC oa 
A1F8- 
AIFAS 90 CF _—- 1500 BCC .1 ~~ NO OVERFLOW 
AIFC- 38 1510 4 SEC SIGNAL BAD CHAR OR OVERFLOW 
A1FD- 60 15 
1530 #---SHIFT VALUE 1 BIT LEFT------- 
AIFE- 06 44 1540 .5 ASL NUML 
i on a i 
1570 #.--CONVERT HEX NUMBER----------- 
A203- 28 1580 .6 PLP POP USELESS STATUS 
A208- 20 AK Al 1590 7 JSR GNNB GET NEXT NON-BLANK CHAR 
A209- 3 ; 1610 SEC a CONVERT ASCII TO DIGIT 
A20A- E9 B 
A20C~ 30 EE 1830 BMI 43 .. NOT A DIGIT 
A20R- 58 ok teeo Bee *B 0-9 
A212= E9 0 16 60 SBC #$07 TRY LETTERS 
A214 30 Bb 1670 BMI ve -seNOT A DIGIT 
A216— 
ei a a arene 
A21A- A2 . 
A21C- 20 FE Al 1440 °9 JSR .5 SHIFT VALUE 1 LEFT 
tee ne RR 4750 BNE 9 
heb. 05 Ay 170 ORA NOM. MERGE VALUE WITH NEW DIGIT 
AD2N- 
A226- 4C O4 A2 1760 JMP .7 .. NEXT DIGIT 


Lines 1530-2120 of the following listing shows my revised 
version, which is sixteen bytes shorter. It is also a little 
faster, though that is not important. As far as I can tell, no 
features are changed. There is room for my ten-byte lower-case 
patch and six bytes to spare! 


Compare the two versions to see where I found the extra bytes. 
Part of the savings was gained by using a better algorithm for 
reducing an ASCII character to a hex or decimal digit. 

Changing the order of the sections of the program saved more 
bytes, by eliminating JMPs and “branch always" ops. I kept the 
same local labels in the new version to aid you in locating 
Similar sections. 


It is always nice to be able to make a self-installing patch, 
so I dug out the April 83 issue of AAL for Bill Morgan's 
PATCHER program. I found the source on a Quarterly Disk, and 
merged it with the new number parser. Then I added my lower 
case patch, and glued it all together. The listing that 
follows is the result. If the program is BRUN it will install 
the new parser and the lower case filter automatically. 
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1900 #SAVE S.DOS LC PATCHES 
00- 1020 PNTR .EQ $00,01 
1050 OR $300 
10 0 : -TF B.DOS LC PATCHES 
1080 PATCHER 
gage a2 gg IGS bee papimon 
O304- AQ 03 1110 LDA /PATCHES-1 
0306- 85 01 1120 STA PNTR+1 
0308- AO 00 1130 LDY #0 
O30A- 20 2B 03 1150 .1 JSR GET.BYTE LENGTH OF NEXT PATCH 
030D- FO 1B 1160 BEQ .4 FINISHED 
O30F- AA 1170 TAX SAVE LENGTH IN X 
0 10- 20 2B 03 1180 JSR GET .BYTE ADDRESS OF PATCH 
0315- 20 2B 03 1200 JSR GET.BYTE 
0318- 85 03 1210 STA PATCH+1 
031A- 20 2B 03 1230 2 JSR GET.BYTE 
031D- 91 02 ~~ 12 STA (PATCH) ,Y 
oaae Be bs (eee BNE 63) 
0323- E6 03 1270 INC PATCH+1 
oa oe 
0328- FO E0 1300 BEQ .1 .. ALWAYS 
032A- 60 153 4 RTS 
1 Ro GET.BYTE 
con a 2 
032F- E6 01 1370 INC PNTR+1 
0331- Bi 00 1380 .1 LDA (PNTR),Y 
0333- 60 1390 : RTS 
4h 1410 NUML .EQ $44 
45- 1420 NUMH .EQ $45 
A1A4- 10 GNNB .EQ $A1A4 
1460 PATCHE 
0334- 70 BO Al 1470 .DA #P1.LENGTH, $A1B9 
1490 ; 
1500 # RETURN .CC. WITH NUMBER IN A,X 
1310 : OR .CS. IF BAD SYNTAX 
95 00 @eseteesoeecc4 == === 2 ee 
1530 CONVERT . NUMBER. IN.WBUF 
A1B9- AO 00 ~——:150 LDY #0 INIT NUMBER = 0 
A1BB- GA a Ps te a (AND LEAVE Y=0 TOO) 
A1BD- 
A1BF- 20 Al At 1570 JSR GNNB GET NEXT NON-BLANK CHAR 
A1C2- FO 2E 1580 BEQ .2 .«-NO NUMBER, RETURN 0 
AIch- c9 AM 1590 CHP ener HEX OR DECIMAL? 
A C - F e eee 
2 1610 #---CONVERT DECIMAL NUMBER------- 
A1C8- 49 BO 1620 3 BOR #$B0 CONVERT CHAR TO DIGIT 
A1CA- C9 OA 1 
pice oe ue = eee Me 
A1D2- 65 4h 1670 ADC NUML 2*VALUE + DIGIT 
A1D4- AA 1680 TAX 
A1D5—= 28 1690 TYA Az=Y=:0 
Aig Spas eg 
A1D9~ 06 ud 1720 ASL NUML SHIFT VALUE 1 LEFT 
A1DB- 
A1DD- 0 nf isko L NUML SHIFT VALUE 1 LEFT 
AIDF- 26 45 1750 ROL NUMH 
A1E1- 8A 1780 TXA .ee+ 8#VALUE 
A1E2- 65 44 1770 ADC NUML 
AIE4- 85 44 =: 1780 STA NUML 
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A1E6- 68 1790 PLA 
A1E7- 65 45 —«:1800 ADC NUMH 
A1E9- 85 45 ~—- 1810 STA NUMH 
A1EB- BO 2A  _—- 1820 BCS .4 . » OVERFLOW 
A1ED- 20 Au A1 1830 .1 JSR GNNB GET NEXT NON-BLANK CHAR 
A1FO- DO D6 18 0 BNE . .. NOT COMMA OR CR 
1850 #---NUMBER I8 FINISHED----------- 
A1F2- A6 44 1860 .2 LDX NUML END OF NUMBER 
A1FN- A5 45  —« 1870 LDA NUMH VALUE IN A,X 
AIFS- 18 1 iS Beata VALID NUMBER 
~ o---MEREP NEXT HEX DEGtT<-------- 
A1F8- OA 1910 .8 POSITION DIGIT 
AIF9- OA 1920 ASL 
AIFA- OA 1 30 ASL 
A1FB- OA 1940 ASL 
A1FC- A2 04 1950 LDX #4 SHIFT VALUE 4 BITS LEFT 
AIFE- 0 19 0 .9 ASL SHIFT DIGIT INTO VALUE 
AIFF- 26 44 391 70 ROL NUML 
A201- 26 45 1980 ROL NUMH 
A203- CA 19.90 DEX 
A20h- DO F8 2000 BNE .9 
2010 #=---CONVERT HEX NUMBER----------- 
A206- 20 AY Al 2020 .7 JSR GNNB GET NEXT NON-BLANK CHAR 
A209- FO E7 2030 BEQ .2 -END OF NUMBER 
A20B- 49 BO ~— 2040 EOR #$B0 CONVERT ASCII TO DIGIT 
A20F- 90 E 2060 BCC .8 .. YES, 0-9 
A211- 69 8 2070 ADC #$88 SHIFT RANGE FOR A-F TEST 
A21 = B E1 2 0 BCS e eee A™@™ 
2100 #---SYNTAX ERROR----------------~ 
A217- 38 2110 .4 SEC SIGNAL BAD CHAR OR OVERFLOW 
A218- 60 2120 RTS 
AIF reat ae 
2180 GNC.LC. PATCH 
A219~ 8E 5D AA 2150 X $AA5D 
A21C= C9 FO 2160 CMP #$£0 
A21E~ 90 02 2170 cc. 
A220- 29 DF 2180 AND #$DF 
A222~ 60 2190 1 RTS 
A223- 2210 "BS $A229-® 
10- 2230 P1.LENGTH .EQ *#-$A1B9 
220 : 
2960) Weskecencewctecceesceeacssccsee cs 
O3A7~ 03 9E Al 2260 .DA #3,$A19E 
2270 “PH $A19E 
AI9E~ 20 19 A2 22 0 JSR GNC.LC. PATCH 


Don Lancaster's AWile TOOLKIT 


Solve all of your Applewriter™ IIe hassles with these eight diskette sides 
crammed full of most-needed goodies including ... 


Patches for NULL, shortline, IIc detrashing, full expansion 
Invisible and automatic microjustify and proportional space 
Complete, thorough, and fully commented disassembly script 
Detailed source code capturing instructions for custom mods 
Clear and useful answers to hundreds of most-asked questions 
Camera ready print quality secrets (like this ad, ferinstance) 
New and mind-blowing WPL routines you simply won't believe 
Self-Prompting (!) glossaries for Diablo, Epson, many others 
Includes a free "must have" bonus book and helpline service 


All this and bunches more for only $39.95. Everything is unlocked and 
unprotected. Order from SYNERGETICS, 746 First Street, Box 809-AAL, 
Thatcher, AZ, 85552. (602) 428-4073. VISA or MC accepted. 
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The Oki 6203 Multiply/Divide Chip..........Bob Sander-Cederlof 


If you really need to multiply or divide'in a hurry, the Oki 
6203 may the ticket. This device sells for about $7, and can 
be almost directly connected to the Apple bus. All you need is 
one inverter and a prototyping board. 


Assuming you built a little card with the device on it, with 
its two address lines connected to Apple's AO and Al lines, you 
could multiply two 8—-bit numbers for a 16-bit product like 
this: 


MUL.6203 STA SLOT*16+S$C080 1ST OPERAND 
STY SLOT*16+$C081 2ND OPERAND 


LDA #2 MULTIPLY COMMAND 
STA SLOT*16+S$C083 COMMAND REGISTER 
NOP DELAY FOR RESULT 


LDA SLOT*16+S$C081 HI-BYTE OF PRODUCT 
LDY SLOT*16+S$C082 LO-BYTE OF PRODUCT 
RTS 


A very similar program can divide a 16-bit value by an 8-bit 
value, producing a quotient and remainder. The time for the 
multiply is only 22 cycles (plus the JSR and RTS if you make a 
subroutine), and 24 cycles for the divide. 


(Please don't order the chip from us, because we don't sell 


chips.) 
WINDOWS! 
for the APPLE Il I and HidoeILy CORNEA 


Windows is: Assembly | Corner is va offering two 
a courses 
-Macintosh-like windows for those who are serious about lesening te 
for the Apple Il! program 
-Easy to use from Basic! t Assambly for the serious beginner 
-Ten new commands! Reh apse ie pel linc 
’ les, source code, etc. 
-A special effects creator! 20 a“ oa Price: $iS/month 
-A screen splitter! aap ie Ageia eee Ta 
-Compatible with all Apple ll an Apple gr: raphe, wwith special utilities 
computers with 48k or more! Price $15/disk 
-Compatible with ProDOS Assembly language runs 58 TIMES faster than 
and DOS 3,3 Unleash = all of your Apple Learn 
in it's native tongue 
-Only $19.95! he i 


Display any message, menu, | gg safe eteaeje i any _e 
etc. right over the existing —! ‘the beginners’ series-(one year) $158 
text without destroying the | __The Graphics series (one dish) #15 
original display. Windows |_The Graphics series (ona year) $58 


A free assembly language fact poster 
are completely independent. t inclidet with eich aden 


Send your check to: ESEMELY CORNER 

in Eugenides, 11601 N.W. 16th St. i | 61 NW. 18th St 
!Pembroke Pines, FL 33026 ' | Pembroke Pines, FL 33826 
$occcen ene renee wenn nn ee == n= - enone ¢ 
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A Disassembler for the 65816......2.+eee++eBOb Sander-Cederlof 


When I first got my Apple, there were no books around for 
learning 6502 assembly language. It took me about 3 months to 
locate and buy a copy of the 6502 programmer's manual from MOS 
Technology. About the same time I found a book by William 
Barden that briefly covered the 8080, 6800, and 6502. But the 
way I really learned the 6502 was by using Woz's L command in 
the Apple monitor. 


Of course there were no printers or printer interfaces around 
in those days either, so I spent hours upon hours copying 20 
lines at a time off the screen. I wrote down a lot of the 
monitor, and all. of the floating point package and Sweet-16 
from the tail end of the Integer BASIC ROM. Fortunately, Apple 
has never gotten around to eliminating the fabulous L-command 
from the monitor. 


In fact, they have even augmented it. The //c version includes 
patches to allow disassembly of the additional opcodes and 
address modes of the 65C02. Since Rak-Ware's DISASM calls on 
the ROM disassembler to decipher each line of code, the //c 
version automatically grows to accomodate the 65C02. 


Now, what about the 65802 and 65816? It's about time someone 
wrote a disassembler for that. Someone? Why not me? 


It's not easy. On the one hand there is the pressure of 
competition. Woz's code is SO compact! On the other hand, the 
new chip is SO complex! It is even ambiguous. There is 
absolutely no way for a 65816 disassembler to know whether an 
immediate-mode instruction is two or three bytes long. Only by 
executing the programming, and tracing it line-by-line, can we 
tell. And even then, it is possible that a tricky programmer 
might set up code so that it can be interpreted both ways, 
depending on other conditions. 


To make a long story a little shorter, I did it. You guessed 
that of course. My solution to the ambiguity problem was to 
put the burden on the person using it. My solution to the 
complexity problem was to use extensive tables. My solution to 
the competition with Woz was to do my best and let him keep his 
well-deserved glory. 


In fact, I started by carefully analyzing Woz's code. The 
trail starts at SFE9E in the monitor ROM. That short piece of 
code calls INSTDSP at $F8D0O twenty times to disassemble 20 
lines of code. If you take a peek ahead to my listing, lines 
1390-1400 patch the language card copy of the monitor inside 
the L-command loop, so that instead of calling $F8D0O twenty 
times it calls my disassembler at $0B67 twenty times. (If you 
are using the language card version of the S-C Macro Assembler, 
there is a copy of the monitor in the language card too.) 


BRUNning the 65816 disassembler will install this little patch 
and toggle the immediate-mode size flag. Thereafter each 800G 
command will toggle the state of the immediate-mode size flag. 
In one state this flag causes immediate mode instructions to be 
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disassembled as 2-byte instructions; in the other, 3-byte 
instructions. 


The tables are quite complicated, and difficult to type in 
accurately. Therefore I used macros and let the S-C Macro 
Assembler do the dirty work. The first table starts at line 
1500, and consists of the packed names of the single byte 
opcodes. The macro at lines 1210-1290 defines how the packing 
is done. The calling line is of the form “>ON A,B,C,D" where 
the A, B, and C parameters are the three letters of the opcode 
name. The D parameter is the letter “°A* on those opcodes which 
might also be multiple-byte: ASL, DEC, INC, LSR, ROR, and ROL. 


The packing algorithm is almost the same as the one Woz used in 
the monitor. Each character is represented by five bits, so 
that three letters take only 15 bits. The macro sets Ll, L2, 
and L3 to the ASCII value (less 64) of the letters of the 
opcode name. The .SE directive is used for this so that each 
invocation of the macro can redefine these variables. This 
compresses the letters from the range $41...5A to $01...1A. 
Then the .DA line uses multiplication and addition to pack up 
the compressed letters. Since arithmetic expressions are 
parsed by the S-C Macro Assembler in a strict left-to-right 
fashion, °L1*32+L2*32+L3*2° packs them together. 


The "ON" macro also generates a label for the opcode name value 
by using the opcode name, together with the 4th parameter when 
present. These names are referred to by another table later 
on. 


The second table is just like the first, but with the names of 
the longer opcodes instead. Notice that ASL, DEC, etc are in 
this table too, but without the 4th parameter. 


The third and fourth tables have 256 entries, one for every 
possible opcode byte. Each entry is only one byte long, so 
each table is 256 bytes. Woz used several smaller tables, 
because the 6502 didn't use every possible opcode value. The 
65816 does define an opcode name for every possible value. 


The OPINDEX table uses two macros: “OXA" for single byte 
opcodes, and “OXB" for longer opcodes. Each entry is a pointer 
to the name in the OPNAMES.A or OPNAMES.B tables. The pointer 
is divided by two, leaving room for a flag bit which tells 
which of the two tables the name is in. 


The entries in the OPFORMAT table are offsets into the FMTBL. 
These are all multiples of 2, because the FMTBL entries are two 


bytes each. 


FMTBL contains coded information indicating how many bytes 
comprise the instruction and operand, and what the address mode 
looks like in assembly language. The length can be from two to 
four bytes, and is coded as 1...3 in the last two bits. The 
rest of the bits tell which special characters to print and 
where to print the value of the operand bytes. Single byte 
opcodes don't have any entries in this table. 
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One more table, the last one: FMTSTR. This defines the 
meaning of the bits in FMTBL. Note that the characters are the 
same as the ones in the various comment lines within FMTBL, 


only in reverse order. 


Finally, we get to the code. The 20-line disassembler calls 
INSTDSP at line 6180. This starts by calling INSDS1 at line 
5760. INSDS1 and INSDS2 are kept as defined points because 
other software sometimes calls these two points. If you wanted 
to modify Rak-Ware's DISASM, for example, you would probably 
need these. 


Lines 5760-5840 print the address of the next opcode, and “- “. 
Lines 5850-5860 pick up that opcode byte. If you enter at 
INSDS2, have the opcode byte already in the A-register. Lines 
5870-5980 dig into the tables to get the opcode name, format, 
and length for single-byte opcodes. Lines 6000-6160 do the 
same for longer opcodes. The differences for longer opcodes 
are several: the second opname table is used, the format is 
gotten from the tables, and the immediate-mode size flag is 
used to determine the length of immediate mode opcodes. 


Lines 6200-6300 print out the 1-4 bytes of the opcode in hex. 
If there are less than four bytes, enough blanks are printed so 
that we always end up in the same position. Lines 6310-6400 
unpack the opcode name and print it out. If the opcode is 
Single byte, lines 6410-6420 find out and send us back home (we 
are finished with this line). 


Lines 6430-6450 test the format to detect MVP, MVN, and 
relative address mode instructions. These special cases are 
handled by lines 6690-7050. All other operand formats are 
handled by lines 6470-6680. I see now that I could have put 
lines 6470-6480 back before line 6430, so that the blank 
separating the opname from the operand was printed before 
Splitting on the mode. Then lines 6700-6710 could be deleted, 
Saving five bytes. Of course line 6720 would then receive the 
".9" label. 


Lines 6500-6520 shift out one bit at a time of the format bit 
string. The corresponding index counts down in the X-register 
from 10 to 0, and picks a format character from FMTSTR to 
print. After the character is printed, two special cases are 
looked for. If the character was “#", meaning immediate mode, 
and if the immediate-mode size flag indicates long immediates, 
another “#" is printed. If the character was "S$", it is time 
to print the operand in hex, as two, four, or six digits (lines 
6620-6650). 


Relative addresses may be either 8-bit or 16-bit. Lines 
6780-6820 start the computation for 8-bit values, and call ona 
monitor routine to finish the printing. Lines 6840-6950 do the 
same for 16-bit relatives. (There are no two-bit relatives 
here, no matter what the family tree has borne.) 


Finally, lines 6970-7050 print out the two bank bytes for the 


MVP and MVN instructions. This is different from the way you 
write MVP and MVN for assembly by the S-C Macro Assembler. In 
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Apple IIc owners can now 
run the single largest body of 
software in existence. Enter 
the CP/M world with the 
new Z-80c from Applied 
Engineering and introduce 
your IIc to thousands of new 
programs. With the Z-80c, 
you'll be able to run Word- 
star, dBase II, Turbo Pascal 
and thousands of other pro- 
grams that require CP/M. But 
your IIc will still be your IIc 
because the Z-80c only turns 
on when using a CP/M disk 
The Z-80c comes standard 
with the new 4.0 software, 
the most advanced system 
for running CP/M programs 
ever. But it also runs other 
versions of CP/M including 
the popular 2.2 and 2.23 and 
is fully compatible with 
Microsoft disks with no pre- 
boot. 

But naturally you'd expect 
top performance from the 
Z-80c. After all, its from 
Applied Engineering and 
we've got years of experience 
with Z-80 cards for the II+ 
and Ile. 

The Z-80c can use all 128K 
in the Hc, or 64K can be 


CP/M 


for the 


PLE IIc 


i. wordstar 
2. dBase i! 


3. 3008 ctner CPM programs 


reserved as a RAM disk 
The Z-80c fits neatly inside 
the Hic. Installation is easy 
and only takes about 10 
Minutes (it just plugs in). 
After installation, your IIc will 
act and look just like other 
IIc’s. only now you can run 
all that great CP/M software 
that others can only dream 
about. 


APPLIED ENGINEERING 


The Z-80c comes complete 
with Z-80 card, 4.0 operating 
system, utility disk, a plain 
English owners manual and a 
3 YEAR WARRANTY. And al- 
though the Z-80c is the only 
CP/M interface on the market 
for the IIc, we've priced it as 
though the competition was 
fierce. 

When you consider the fact 
that many people spend 2 or 
3 thousand dollars on a 
CP/M only computer, our 
price of $159 is an offer 
that’s practically irresistible. 
The Z-80c will give you two 
computers in one and the 
advantages of both, all at an 
unbelievably low price. 

Call (214) 492-2027 

9am. to 1] p.m. 

7 days a week 

Send check or money order 
P.O. Box 798 

Carrollton, Texas 75006 


= 

=a 
MasterCard, Visa and 
C.O.D. welcome. No extra 
charge for credit cards. 
Texas residents add 
54%% sales tax. 
Add $10.00 if outside US.A 
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the assembler you write “MVP addrl,addr2", where both addresses 
are 24-bit values. The bank bytes come from the high byte of 
each 24-bit address. To be compatible with the assembler I 
Should change lines 6970-7050 to print out “0000" after each 
bank byte. 


It seems like a worthy project for someone to incorporate my 
program into Rak-Ware's DISASM, or perhaps a new similar 
product. If so, that someone should figure out a neat 
interactive way to control the immediate-mode size flag. How 
about it, Bob? 


1010 #SAVE S.65816 DISASM 
O20. Oa ee eee eek 
00- 1030 IMM.SIZE .EQ $00 
2C- 1040 LMNEM [EQ $2C 
2D- 1050 RMNEM .EQ $2D 
2F- 1060 FORMATL .EQ $2E 
oF- 1070 LENGTH .EQ $2F 
30- 1080 FORMATH .EQ $30 
A- 1090 PCL .EQ $3A 
B- 1100 PCH .EQ $3B 
F879- 1120 SCRN2 .EQ $F87 
F938- 1130 RELADR .EQ $F9 
FOhi- 1140 PRNTAX .EQ $F941 
F948- 1150 PRBLNK .EQ $F948 
Foe Jive beEba BG geaes 
ERBEA 1160 CROUT .EQ ERBE 
FDDA- 1190 PRBYTE .EQ $FDDA 
FDED- 1200 C -EQ $FDED 
1220 .MAON 
1230 .LIST OFF 
1240 L1 7SE ']1-64 
1250 L2 .SE ']2-64 
1270 LIST ON 
1280 J1)2]3]4 DA L1#32+L2#32+L3#2 
1290 : . EM 
1319 : ox 
20 SDA #]1-OPNAMES .A/2+128 
1 0 $o52U 2. 2s Ss Se 4 Oo SP Oe 4D Ge OF a OF 4 Oe OS GH Oe Ee GS SS oe Ge a 
F 0 .MA Oy 
1360 -DA #]1-OPNAMES .B/2 
1 19 EM 
0800- ap 83 co 1300 T --Lba 30083—CS 
= A 
0803- AD 83 CO 1880 LDA 30083 
0806- AQ 67 1410 LDA fINSTDSP 
OBobe bo OB Te dase a eieee 
080D- 88 66 FE nko “rnes 
0810- A5 00 1450 LDA IMM. SIZE 
0812- 49 FF 1460 EOR #$FF 
0814- 85 00 1470 STA IMM.SIZE 
0816- 60 1480 . 
1500 OPNAMES.A 
0817=- D8 OC 0000> ASLA .DA L1®32+L2#32+L3#2 
0819- 1520 >ON B,R,K 
0819= 96 14 0000> BRK .DA L1#32+L2#32+L3#2 
081B- 1530 >ON C,L,C 


081B- 06 1B 0000> CLC .DA L1#32+4L2%32+L3*2 
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», & base's & Hea Gonp vl OCPWHEES A and 


The assembly listing of that table 


B (By the way, OPNAMES.B .EQ $881): 


NAMES . 


Aphauee ta ahant 4 nages 


That's enough of that. 


TBO NDOOOST =F UO Nat 
O OWMNS lar AO0 


OCONas Qasr KOR-AnAA 
Q98&&FK AMORA’ 


NOD NOTOAUNOOST 
DADO WA PrROWUM 


ADQEeswneMN—-A--WDWA 
MNOF LK ANNHOWODAAN 


TED UDMOW SO OOTON 
POO KH ETO MOD M 


DARnIMTNOMEAaAHMAsT 
QOQee KK NOwWUDAAa 


Nw B00 AICO NO Wat Os 
UNO 800 MUN © COUN GI OMO) 


BO Mek KT NOD NN 
ee Te 
DOD OD ODO ODOO OO 
OD ANAT AMNOOAA 
DOOD DODODODDDDOO 
OOO OOOO GO0O0000 
NON = ODODOOWNG 
= EMDOMOBANN HOS = 
DHKDAAAMMNNAO=T Oo 
w= NSP COCCI QO <f 


MWWO NOANDNDOO OW 
OeTMQONOMNRH-NOmT 


AN OO MN er N 
OOM ANAUMONADS 
ADT NPODDO HAHN 
(ee vvpteeigetdeyts 
th Oc O10 OD OD ODO 
me AN MMT ot LAN 
00. cO. 0000 00.00 0000 C000 C000 
olelelololelolelolelala{ea) 


-DA #BRK-OPNAMES .A/2+128 


-DA #ORA-OPNAMES .B/2 


>OXA BRK 
2OXA COP 
~DA #COP-OPNAMES .A/2+128 


10)". Sees sec ecco wee eceankeeeeenes 
Q Weis (anes ccc ebcceascekecceess 


58 
2520 OPINDEX 
And the OPINDEX table runs about 7 pages, so another hex dump 


NAKNSESE SZEDBOOO 


RICK ete Oe en ean 
NAN EE NAKMOMOaumnuMmM 


DOMANIICO DN gy = wo 


B=. = 8-00 0000 0 fal (2) (2 ELLY 
NONANE KK KOOOONNaa 


<< a Mi BOs NO ODO MaMa w 


O R00 000000 Ez] (2) [2] (2 LOLLY 
ONNNAN ERK KK DODQDONNAA 


DoWDWDWANOININSIN 
SOQoQo2e& e&eNerNne= 


Om BNUANNC-O BOON 
ONS Bene BZOKnO es 


IO OT ENANINE QOM 
MOH HNODMNDK—AUAO AN 


eT KKMKNANNNOOOSO 
eo OOO eree--O000 


MAAN t- i) fe OTOW AM 
NHODE™ HNO LOW OOD ENO = 


(2) fs) 2362 KUN OOO 
TKK OO0OKK KK C00 


NANNMNMmMmmMmmMmmMmMaasst 
OO NAAN Be K eK ANAIN 


WMQerK—MeQ\n\nnqgdoea 


Om 
NN 
= (x) 
a= 
© w& 
feo) 
(2 
S seeed 


O8DB- 81 1E 86 1E 2C 
O- 0 


O8EO- 1E 02 
O8E8- 1E 0 


5250 $W wee neem wow e oem en meee ewww own ee 


The assembly listing of OPFORMAT is around a page and a half, 
5260 a aia 


so we'll just LIST this one: 


e e e e @ 
oNONOoONON 
AANAIAIAIOIAICN 

e e@e8 @e@ ® * e e 
NcoWica Neo 
DOODOG0008 

eeoe#eee @e@8 @ 
N@dNa Na Nc 
ODODOQD0000 

eo eemhmlepmUCtmC UC OUCOOUUCOF 
NNN =f st Aca Alco 
DOOONNOOOO 

e e e e oe e e e e é 
CD (x}C) (23 ©) (290) 2 CD C230) £2) 
SS CO MPC KX 

oe eee eo e e e 


22. 
20. 
2e. 
20. 
22. 


8 
1€.02.02.02 
12.1E.02. 08.08 
00.1C.02.02.02 
12. 1E.08. 08. 08 


0. 
6 
2 
0 
g 
2 
8 
2 
QO. 
2. 
0 


OT OK OKNK-NKOKO 
TOTOF OF OF OF Os O40 
EFCC SC FSC CFSE KE eee 
o oe 0 @ @ @ @ @ 
oWoNSkSkeRsKesKss 
“NY 
nanannnanne naan 2 


\ 
6 


oN MET LOKO =O Ov £0 ©) Cf) fy 


e e e e e e e e e 
Cs feE Coy fay Co, Eos Cs Oxy Coley C2, bx, (2, f2, be, 


N 
LOVIAID LD LD LOD LOAD LALO LA LOL LY 
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5450 #----- eee XS) SS earn 
0190 5460 .DA $1.0.0.1.6.0.0.0.6.0.6.0.0.0.01 -- IMMEDIATE 00 
01 10 ays -DA 0.0.0.1.0.0.0.0.0.0.0.0.0.0.01 called DIRECT 02 
02 10 54 -DA 0.0.0.1.0.0.0.0.0.0.0.0.0.0.10 oe ABS O04 
03 10 2390 DA 40.0.0.1.0.0.0.0.0.0.0.0.0.0.11 aed LONG 06 
5500 #----— # > { ; XS ) Y ; - - - LL 
01 1C 510 DA 0.0. ° ~4.1.0.0.6.0. -0.0.0.01 -- DIRECT ,X 08 
02 1C 52 DA 0.0.0.1.1.1.0.0.0.0.0.0.0.0.10 = ABS xX OA 
03 1C 5530 :DA £0.0.0.1.1.1.0.0.0.0.0.0.0.0.11 -= LONG,X oc 
550 #----- ECE ES) sa UL 
44 18 55 0 DA 0.0.0. .4.0.0.0.6.1. -0.0.0.01 ates DIRECT ,Y OE 
42 1 5560 .DA $0.0.0.1.1.0.0.0.0.1.0.0.0.0.10 == ABS,Y 10 
=H ooooe #> ( $ xX S ) Y ; - - - LL 
0131 5580 .DA $0.0.1.1.6.0.0.1.6.0.0.0.0.0.01 -- IND 12 
01 33 2eb0 -DA 0.0.1.1.1.1.0.1.0.0.0.0.0.0.01 or INDX i) 
C1 1 0 -DA 0.0.1.1.0.0.0.1.1.1.0.0.0.0.01 aioe INDY 1 
5610 #-----# > ( ; XS) Y$--- LL 
02 31 5620 .DA $0.0.1.1.6.0.0.1.6.0.0.0.0.0.10 -- INDABS 18 
02 3D 2030 DA tr Te ee = INDABSX 1A 
5040 #----- # > xs ) Y $ - - - LL 
01 1A 5650 -DA 40.0.0. 1. 1.0. 1.0.0.0.0.0.0.0.01 = STK 1C 
C1 3B 5660 DA £0 .0.1.1.1.0.1.1.1.1.0.0.0.0.01 — STKY 1E 
B8kO wDAE §3.4.9.0.5.8.4.0.0.8.0.0.0.05 
01 71 0 -DA 4 «ls e .6.0.0. .6.0. .0.0.0.01 =“ INDLONG 20 
C1 71 56 -DA 40.1.1.1.0.0.0.1.1.1.0.0.0.0.01 =“ INDLONGY 22 
A2 10 5700 .DA $0.0.0.1.0.0.0.0.1.0.1.0.0.0.10 -—- MVN & MVP 24 
21 00 2 10 .DA £5 28020782 020.02 0708. 120.9202 96 @-- RELATIVE 2 
22 60 2430 DA 0.0.0.0.0.0.0.0.0.0.1.0.0.0.10 =< LONG RELA. 2 
Ag DS DS 
A A AB 
20 8E FD 2766 INSDS1 JSR CROUT 
A5 3B ie LDA PCH 
20 DA FD 5780 JSR PRBYTE 
A5 3A 5790 LDA PCL 
20 DA FD 5800 JSR PRBYTE 
AQ AD 5810 LDA #*—" 
20 ED FD 5820 JSR COUT 
AQ AO 5830 LDA #* *® 
20 ED FD 5840 JSR COUT 
AO 00 5850 LDY fe 
B1 3A 5860 LDA (PCL),Y GET OPCODE 
A8 2870 INSDS2 TAY SAVE IN Y-REG 
BR DB 08 ef LDA OPINDEX, Y 
90 ASL 
AA 5900 TAX 
90 OF 5910 BCC .1 -»eNOT SINGLE BYTE OPCODE 
D 17 08 2850 LDA OPNAMES .A,X 
5 2 he STA RMNEM 
BD 18 08 5940 LDA OPNAMES .A+1,X 
85 2C 5950 STA LMNEM 
Ae 00 2366 LDA #0 
2F 5 fo STA LENGTH 
60 59 RTS 
5000) Sescetes  sceecwe ee ee ecebecicee 
BD 81 08 6000 .1 LDA OPNAMES .B,X 
85 2D 6010 STA RMNEM 
BD 82 08 6020 LDA OPNAMES .B+1,X 
85 2C o088 STA LMNEM 
BE DB 09 60 0 LDX OPFORMAT,Y 
BD DC OA 6050 LDA BL+1, 
85 30 6060 STA FORMATH 
BD DB OA Poke LDA FMTBL ,X 
B5 2E 6080 STA FORMATL 
29 03 090 AND #3 
85 2F 6100 STA LENGTH 
8A 6110 TXA CHECK IF IMMEDIATE 
DO 06 6420 BNE .2 --NO 
24 00 130 BIT IMM.SIZE CHECK IF 16-BIT MODE 
10 02 6140 BPL .2 -» NO 
E6 2F 6150 INC LENGTH ~ YES 
60 6160 .2 RTS 
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6170, Nese oe eee eee 
6180 INSTDSP 
OB67- 20 10 OB 6190 JSR INSDS1 
OBGA- AO 00 6200 LDY #0 
OB6C- B1 3A 210 .1 LDA (PCL),Y 
OB6E- 20 DA FD 6220 JSR PRBYT 
OB71- A2 01 6230 LDX #1 PRINT 1 BLANK 
OBT 3- 20 4A FQ 6240 .2 JSR PRBL 
OB76- Ch 2F 250 CPY LENGTH 
OB78- C8 6260 INY 
OB79- 90 F1 6270 BCC .1 
OB7B- A2 0 280 LDX # 
OB7D- CO 0 290 CPY # 
OB7F- 90 F2 6300 BCC .2 
6310 #---PRINT MNEMONIC-------------~- 
OB81- AO 0 6 320 LDY 3 
OB83- AO 0 30 3 LDA 
OB85- 06 2D 3=s-_:« 6 3440. =. ASL RMNEM 
OB87- 26 20 6350 ROL LMNEM 
OB89- 2A § 360 ROL 
OBBA- 10 F9 6 19 BPL .4 
OB8C- 20 ED FD 6360 JSR COUT 
OB8F- 88 6 390 DEY 
OB90- DO F1 6 00 BNE ‘3 
OB92- Au 2F 410 LDY LENGTH 
OBQ4- FO 33. 6420 BEQ .8 »»s SINGLE BYTE OPCODE 
OB96- A5 2E 64 30 LDA FORMATL 
OB98- 29 20 64h0 AND #$20 SEE IF SPECIAL 
OB9A- DO 2E 6450 BNE . .».YES, MOVES OR RELATIVES 
6460 #---PRINT NORMAL OPERANDS-------- 
OB9C- AQ AO 6470 LDA #" " 
OB9E- 20 ED FD gi 0 JSR COUT 
OBAT~ A2 OA 490 LDX #10 11 FORMAT BITS 
OBA3- 06 2E 6500 .5 ASL FORMA 
OBA5= 26 30 6510 ROL FORMATH 
OBA7- 90 1D ‘6520 BCC .7 
OBA9- BD 05 OB 6530 LDA FMTSTR ,X 
OBAC- 20 ED FD 65 JSR COUT 
OBAF- C9 A3..—- 6550 CMP #"#" 
OBB1- DO 0 6560 BNE .55 
OBB3- 24 0 570 BIT IMM.SIZE 
OBB5~ 10 OF 6580 BPL .7 
OBB7- 20 ED FD 6590 JSR COUT 
OBBA- C9 AX 6600 .55 CMP #Rgn 
OBBC- DO 08 6610 BNE .7 
OBBE- B1 3A 6620 .6 LDA (PCL),Y 
OBCO- 20 DA FD 6630 JSR PRBYTE 
OBC3- 88 6640 DEY 
OBCH- DO F8 50 BNE .6 
OBC6- CA 6660 .7 DEX 
OBC7- 10 DA 6670 BPL .5 
OBC9- 60 6680 .8 RTS 
6690 #---SPECIAL CASES------~---------- 
OBCA= AQ AO 6700 .9 LDA #" 1" 
OBCC~ 20 ED FD 6710 JSR COUT 
OBCF- AQ A4 6720 LDA #"$" 
OBD1- 20 ED FD 6730 JSR COUT 
OBD4- AS 2E ~—-«6 740 LDA FORMATL 
OBD6- 30 20 6750 BMI .11 MVN & MVP 
OBD8- 88 6760 DEY DISTINGUISH RELATIVES 
OBD9- DO 07 6770 BNE .10 16-BIT RELATIVE 
6780 #---8-BIT RELATIVE--------------- 
OBDB- C8 6790 INY 8-BIT RELATIVE 
OBDC- BJ 3A 6800 LDA (PCL),Y GET 8-BIT OFFSET 
OBDE- 3 6810 SEC 
OBDF- 4c 38 F9 6820 JMP RELADR 
6830 #---16-BIT RELATIVE-------------- 
OBE2- B1 3A 6840 .10 LDA (PCL),Y LOW BYTE OF OFFSET 
OBE4- 85 2E 6850 STA FORMATL 
OBE6- C 6860 INY 
OBE7- B1 3A 6870 LDA (PCL),Y HIGH BYTE OF OFFSET 
OBE9- 8 30 96 0 STA FORMATH 
OBEB- 20 53 F9 6890 JSR PCADJ 
OBEE- 18 6900 CLC 
OBEF- 65 2E 6910 ADC FORMATL 
OBF1- AA 9920 TAX 
OBF2- 98 30 TYA 
OBF3- 65 30 69ho ADC FORMATH 
OBF5- 4C 41 F9 6950 JMP PRNTAX 
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60 B2--MVN & MY Pewee nn eee 

OBF8- B1 3A 8360 11 LDA PCL) ,Y 
as 19 re FD eae JSR PRBYTE 

- 0 LDA #",* 
OBFF= 20 ED FD 3 
OBFE- 26 ED FD 7669 68 Godt 
OCO4=- 20 ED FD 7020 JSR COUT 
OCOT= 88 


7030 DEY 
GEBR= Rd BR rp 7888 YRB pREvtE™ 


Finding Memory Size in ProDOS........ee..--Bob Sander-Cederlof 


On page 6-63 of Beneath Apple ProDOS there is a small piece of 
code designed to determine how much memory there is: 


LDA S$BF98 
ASL 

ASL 

BIT 0 

BPL SMLMEM 
BVS MEM128 


48K 
128K 
otherwise 64K 


The code will not work. The BIT 0 will test bits 7 and 6 of 
memory location $0000, which have nothing whatsoever to do with 
how much memory is in your machine. What was intended was to 
test bits 7 and 6 of the A-register, or in other words bits 5 
and 4 of SBF98. Here is one way you can do that: 


LDA S$BF98 
ASL 


BCC SMLMEM 
BMI MEM128 


48K 
128K 
OTHERWISE 64K 


Notice that not only does this perform the test correctly, it 
is also one byte shorter! 


If you insist on using the same number of bytes, here is 
another way to test those bits: 


LDA SBF98 

AND #%00110000 ISOLATE BITS 5 AND 4 
CMP #%00100000 

BCC SMLMEM 48K 

BNE MEM128 128K 


OTHERWISE 64K 


If any of you have discovered any other problems with the 
sample code in this book, pass them along. 
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